(describe-function-1): Use remap-command.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 20d76f9c9132029525f862beee5e04792eb850e1..4b4f78c084717e41f74310353aa969eeb8b8d5af 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -207,9 +207,7 @@ and the file name is displayed in the echo area."
     (princ ".")
     (terpri)
     (when (commandp function)
-      (let* ((binding (and (symbolp function) (commandp function)
-                          (key-binding function nil t)))
-            (remapped (and (symbolp binding) (commandp binding) binding))
+      (let* ((remapped (remap-command function))
             (keys (where-is-internal
                   (or remapped function) overriding-local-map nil nil)))
        (when remapped